home *** CD-ROM | disk | FTP | other *** search
/ CD Ware Multimedia 1995 May / cd Ware (Juegos) Epimundo.iso / DOS / C / TCCLIB.ZIP / REPCHAR.C < prev    next >
Encoding:
C/C++ Source or Header  |  1990-01-31  |  292 b   |  18 lines
  1. unsigned char far *CurrentPos( void );
  2.  
  3. extern unsigned char attrib;
  4. void TcclibInitialize( void );
  5.  
  6.  
  7. void RepChar( int times, unsigned char c )
  8. {
  9.     unsigned char far *scptr = CurrentPos();
  10.  
  11.     TcclibInitialize();
  12.  
  13.     while ( times-- ) {
  14.         *scptr++ = c;
  15.         *scptr++ = attrib;
  16.     }
  17. }
  18.